һʹ÷ռλüڴַõַԴ洢űʱɸĵĳϢ磬ԴһΪ ClickCount ı洢û Web ҳĳĴʹñҪ˽ڼڴеĵַֻҪͨñͿԲ鿴ıֵ VBScript ֻһͣ VariantбͶ Variant


һַʽʹ Dim 䡢Public  Private ڽűʽ磺 

 Dim DegreesFahrenheit
ʱʹöŷָ磺 

 Dim Top, Bottom, Left, Right
һַʽֱͨڽűʹñһ򵥷ʽʽͨһϰߣΪʱڱƴнűʱĽˣʹ Option Explicit ʽбΪűĵһ䡣


ѭ VBScript ı׼򡣱ѭ 

һַĸ 
ܰǶľ㡣 
Ȳܳ 255 ַ 
ڱڱΨһ 

λþڹֻиùеĴԷʻıֵʱоֲ򲢱Ϊ̼ڹ֮ñԱűйʶ𣬳Ϊ Script нű

ڵʱΪڡScript Ĵڴӱһֱűнڹ̼ڽǸùеʱ䣬ù̽󣬱֮ʧִйʱֲʱ洢ռ䡣ڲͬʹͬľֲΪÿֲֻĹʶ

ֵ
ʽıʽֵڱʽߣҪֵڱʽұߡ磺 

 B = 200

£ֻΪıһֵֻһֵıΪʱ򣬽ֵһΪ㣬˿ԴһϵֵıΪͱͬķʽģΨһʱ ( )һ 11 Ԫصһά飺 

 Dim A(10)
Ȼʾ 10 VBScript 鶼ǻ 0 ģʵϰ 11 Ԫءڻ 0 УԪصĿʾĿ 1鱻Ϊ̶С顣

ʹΪÿԪظֵ 0  10ݸԪأʾ 

 A(0) = 256
 A(1) = 324
 A(2) = 100
 . . .
 A(10) = 55
ƣʹԼԪصݡ磺 

 . . . 
 SomeVariable = A(8)  
 . . . 
鲢һάάΪ 60ܴ˲ⳬ 3  4 άάʱöŷָÿʾС֡УMyTable һ 6 к 11 еĶά飺 

 Dim MyTable(5, 10)
ڶάУеһֱʾеĿڶֱʾеĿ

Ҳ̬飬нűʱС仯顣ʹ Dim  ReDim 䡣Ƕڶ̬飬вκ֡磺 

 Dim MyArray()
 ReDim AnotherArray()
Ҫʹö̬飬ʹ ReDim ȷάÿһάĴСУReDim ̬ĳʼСΪ 25 ReDim 佫ĴСµΪ 30ͬʱʹ Preserve ؼµСʱݡ

 ReDim MyArray(25)
 . . . 
 ReDim Preserve MyArray(30)
µ̬СĴûκƵģĴССʱᶪʧɾԪصݡ

